home *** CD-ROM | disk | FTP | other *** search
/ Revista do CD-ROM 102 / CD-ROM 102.iso / aplic / 2sync / 2SyncSetup.exe / graphics / scripts / DefineSprite_380 / frame_2 / DoAction.as
Encoding:
Text File  |  2002-03-20  |  1.0 KB  |  37 lines
  1. if(eval("_level0:lp_module") eq "mc")
  2. {
  3.    lp_module = "mc";
  4. }
  5. else
  6. {
  7.    lp_module = "mt";
  8. }
  9. setProperty("catchAll", _visible, "0");
  10. x = "1";
  11. n = "1";
  12. setProperty("popupmenu/popupentry", _visible, "0");
  13. while(eval("_level0/data:totalmy") >= n)
  14. {
  15.    if(lp_module ne eval("_level0/data:my" add n))
  16.    {
  17.       set("popupmenu:depth",eval("popupmenu:depth") + "1");
  18.       duplicateMovieClip("popupmenu/popupentry","popup" add n,eval("popupmenu:depth") + "10000" + 16384);
  19.       setProperty("popupmenu/popup" add n, _Y, (x - "1") * (- getProperty("popupmenu/popupentry", _height)));
  20.       tellTarget("popupmenu/popup" add n add "/popupoption")
  21.       {
  22.          skip = "1";
  23.          set("../:iam",eval("_level0/data:my" add eval("../../../:n")));
  24.          gotoAndStop(eval("../../../:n") + "1");
  25.       }
  26.       x += "1";
  27.    }
  28.    else
  29.    {
  30.       option = eval("_level0/data:my" add n);
  31.    }
  32.    n += "1";
  33. }
  34. setProperty("popupmenu/popTp", _visible, "0");
  35. setProperty("popupmenu", _visible, "0");
  36. stop();
  37.